inherited FCadastroRequisicao: TFCadastroRequisicao
  Left = 245
  Top = 189
  Caption = 'Requisi'#231#227'o de Materiais'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 16
  inherited pcCadastro: TPageControl
    ActivePage = TsCadastro
    TabIndex = 1
    inherited TsPesquisa: TTabSheet
      inherited dbgPesquisaPadra: TDBGrid
        Columns = <
          item
            Expanded = False
            FieldName = 'REQ_CODIGO'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'REQ_DATA'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'REQ_SOLICITANTE_DESC'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'REQ_AUTORIZADA'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'REQ_AUTORIZANTE_DESC'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'REQ_NTALAO'
            Title.Alignment = taCenter
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'REQ_ORDEM_SERVICO'
            Title.Alignment = taCenter
            Title.Caption = 'OS'
            Visible = True
          end>
      end
      inherited pnPesquisaPadrao: TPanel
        object GroupBox2: TGroupBox
          Left = 690
          Top = 12
          Width = 147
          Height = 42
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 3
          object CheckBox1: TCheckBox
            Tag = 1
            Left = 1
            Top = 8
            Width = 145
            Height = 17
            Caption = 'N'#227'o Validadas'
            Color = clYellow
            ParentColor = False
            TabOrder = 0
            OnClick = CheckBox1Click
          end
          object CheckBox2: TCheckBox
            Tag = 1
            Left = 1
            Top = 24
            Width = 145
            Height = 17
            Caption = 'Validadas'
            Color = clLime
            ParentColor = False
            TabOrder = 1
            OnClick = CheckBox1Click
          end
        end
      end
    end
    inherited TsCadastro: TTabSheet
      inherited panel1: TPanel
        inherited panel2: TPanel
          inherited DBNavigator1: TDBNavigator
            Hints.Strings = ()
          end
          object BtnEmitir: TBitBtn
            Left = 310
            Top = 5
            Width = 100
            Height = 25
            Caption = 'Emi&tir'
            TabOrder = 6
            OnClick = BtnEmitirClick
            Glyph.Data = {
              66010000424D6601000000000000760000002800000014000000140000000100
              040000000000F000000000000000000000001000000000000000000000000000
              8000008000000080800080000000800080008080000080808000C0C0C0000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
              DDDDDDDD0000DDDDDDDDDDDDDDDDDDDD0000DD000DDDDDDDDDD000DD0000D000
              000000000000000D0000D0F8888888888888880D0000D0F8888888888888880D
              0000D0F8888888822899880D0000D0FFFFFFFFFFFFFFFF0D0000D70077777777
              7777007D0000DDD00000000000000DDD0000DDD00FFFFFFFFFF00DDD0000DDDD
              0F00000000F0DDDD0000DDDD0FFFFFFFFFF0DDDD0000DDDD0F00000000F0DDDD
              0000DDDD0FFFFFFFFFF0DDDD0000DDDD0F00FFFFFFF0DDDD0000DDDD0FFFFFFF
              FFF0DDDD0000DDDD000000000000DDDD0000DDDDDDDDDDDDDDDDDDDD0000DDDD
              DDDDDDDDDDDDDDDD0000}
          end
        end
        inherited panel3: TPanel
          object BitBtn1: TBitBtn
            Left = 8
            Top = 8
            Width = 153
            Height = 25
            Caption = 'Autorizar Requisi'#231#227'o'
            TabOrder = 4
            OnClick = BitBtn1Click
            Glyph.Data = {
              76010000424D7601000000000000760000002800000020000000100000000100
              04000000000000010000120B0000120B00001000000000000000000000000000
              800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000003
              333333333F777773FF333333008888800333333377333F3773F3333077870787
              7033333733337F33373F3308888707888803337F33337F33337F330777880887
              7703337F33337FF3337F3308888000888803337F333777F3337F330777700077
              7703337F33377733337FB3088888888888033373FFFFFFFFFF733B3000000000
              0033333777777777773333BBBB3333080333333333F3337F7F33BBBB707BB308
              03333333373F337F7F3333BB08033308033333337F7F337F7F333B3B08033308
              033333337F73FF737F33B33B778000877333333373F777337333333B30888880
              33333333373FFFF73333333B3300000333333333337777733333}
            NumGlyphs = 2
          end
        end
        object PageControl1: TPageControl
          Left = 1
          Top = 36
          Width = 842
          Height = 389
          ActivePage = TabSheet2
          Align = alClient
          TabIndex = 1
          TabOrder = 2
          object TabSheet1: TTabSheet
            Caption = 'Cabe'#231'alho'
            object Label8: TLabel
              Left = 8
              Top = 112
              Width = 78
              Height = 16
              Caption = 'C'#243'd. C.Custo'
            end
            object Label1: TLabel
              Left = 8
              Top = 16
              Width = 40
              Height = 16
              Caption = 'C'#243'digo'
            end
            object Label2: TLabel
              Left = 72
              Top = 16
              Width = 27
              Height = 16
              Caption = 'Data'
            end
            object Label3: TLabel
              Left = 96
              Top = 64
              Width = 99
              Height = 16
              Caption = 'Requisitante (F8)'
            end
            object Label18: TLabel
              Left = 96
              Top = 112
              Width = 121
              Height = 16
              Caption = 'Centro de Custo (F8)'
            end
            object Label5: TLabel
              Left = 8
              Top = 164
              Width = 105
              Height = 16
              Caption = 'Motivo Requisi'#231#227'o'
            end
            object Label10: TLabel
              Left = 8
              Top = 64
              Width = 53
              Height = 16
              Caption = 'Matr'#237'cula'
            end
            object Label11: TLabel
              Left = 8
              Top = 216
              Width = 103
              Height = 16
              Caption = 'Ordem de Servi'#231'o'
            end
            object Label12: TLabel
              Left = 168
              Top = 16
              Width = 49
              Height = 16
              Caption = 'N'#186' Tal'#227'o'
            end
            object edCodigo: TDBEdit
              Left = 8
              Top = 32
              Width = 57
              Height = 22
              Ctl3D = False
              DataField = 'REQ_CODIGO'
              DataSource = dsCadastro
              ParentCtl3D = False
              ReadOnly = True
              TabOrder = 0
            end
            object edData: TDBDateEdit
              Left = 72
              Top = 32
              Width = 90
              Height = 22
              DataField = 'REQ_DATA'
              DataSource = dsCadastro
              Ctl3D = False
              ButtonWidth = 20
              NumGlyphs = 2
              ParentCtl3D = False
              TabOrder = 1
            end
            object dblSolicitante: TDBLookupComboBox
              Left = 96
              Top = 80
              Width = 321
              Height = 22
              Ctl3D = False
              DataField = 'REQ_SOLICITANTE'
              DataSource = dsCadastro
              KeyField = 'SOLI_CODIGO'
              ListField = 'SOLI_NOME'
              ListSource = DSSolicitante
              ParentCtl3D = False
              TabOrder = 4
              OnExit = dblSolicitanteExit
              OnKeyDown = dblSolicitanteKeyDown
            end
            object edCodCentroCusto: TEdit
              Left = 8
              Top = 129
              Width = 82
              Height = 22
              Ctl3D = False
              ParentCtl3D = False
              TabOrder = 5
              OnExit = edCodCentroCustoExit
            end
            object DBLCentroCusto: TDBLookupComboBox
              Left = 96
              Top = 129
              Width = 321
              Height = 22
              Ctl3D = False
              DataField = 'REQ_CENTROCUSTO'
              DataSource = dsCadastro
              KeyField = 'CODIGO'
              ListField = 'DESCRICAO'
              ListSource = dsCentroCusto
              ParentCtl3D = False
              TabOrder = 6
              OnExit = DBLCentroCustoExit
              OnKeyDown = DBLCentroCustoKeyDown
            end
            object dblTipoRequisicao: TDBLookupComboBox
              Left = 8
              Top = 184
              Width = 409
              Height = 22
              Ctl3D = False
              DataField = 'REQ_TIPO_REQUISICAO'
              DataSource = dsCadastro
              KeyField = 'TIPO_REQ_CODIGO'
              ListField = 'TIPO_REQ_DESC'
              ListSource = dsTipoRequisicao
              ParentCtl3D = False
              TabOrder = 7
              OnKeyDown = dblTipoRequisicaoKeyDown
            end
            object GroupBox1: TGroupBox
              Left = 8
              Top = 264
              Width = 409
              Height = 73
              Caption = ' Autoriza'#231#227'o '
              Ctl3D = False
              ParentCtl3D = False
              TabOrder = 9
              object Label6: TLabel
                Left = 8
                Top = 24
                Width = 4
                Height = 16
              end
              object Label7: TLabel
                Left = 392
                Top = 24
                Width = 4
                Height = 16
                Alignment = taRightJustify
              end
              object Label9: TLabel
                Left = 8
                Top = 48
                Width = 4
                Height = 16
              end
            end
            object edMatricula: TEdit
              Left = 8
              Top = 80
              Width = 82
              Height = 22
              Ctl3D = False
              ParentCtl3D = False
              TabOrder = 3
              OnExit = edMatriculaExit
            end
            object edOrdemServico: TDBEdit
              Left = 8
              Top = 232
              Width = 105
              Height = 22
              Ctl3D = False
              DataField = 'REQ_ORDEM_SERVICO'
              DataSource = dsCadastro
              ParentCtl3D = False
              TabOrder = 8
              OnExit = edOrdemServicoExit
              OnKeyPress = edOrdemServicoKeyPress
            end
            object edNTalao: TDBEdit
              Left = 168
              Top = 32
              Width = 97
              Height = 22
              Ctl3D = False
              DataField = 'REQ_NTALAO'
              DataSource = dsCadastro
              ParentCtl3D = False
              TabOrder = 2
            end
          end
          object TabSheet2: TTabSheet
            Caption = 'Itens'
            ImageIndex = 1
            object Label66: TLabel
              Left = 3
              Top = 95
              Width = 67
              Height = 16
              Caption = 'C'#243'digo (F8)'
              Font.Charset = ANSI_CHARSET
              Font.Color = clBlack
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = []
              ParentFont = False
            end
            object Label24: TLabel
              Left = 80
              Top = 95
              Width = 85
              Height = 16
              Caption = 'Descri'#231#227'o (F8)'
              Font.Charset = ANSI_CHARSET
              Font.Color = clBlack
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = []
              ParentFont = False
            end
            object Label35: TLabel
              Left = 534
              Top = 94
              Width = 66
              Height = 16
              Caption = 'Quantidade'
            end
            object Label4: TLabel
              Left = 2
              Top = 44
              Width = 83
              Height = 16
              Caption = 'Estoque/Local'
            end
            object DBGrid1: TDBGrid
              Left = 0
              Top = 216
              Width = 834
              Height = 142
              Align = alBottom
              DataSource = DsItensRequisicao
              Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
              TabOrder = 6
              TitleFont.Charset = ANSI_CHARSET
              TitleFont.Color = clWindowText
              TitleFont.Height = -13
              TitleFont.Name = 'Arial'
              TitleFont.Style = []
              OnDrawColumnCell = DBGrid1DrawColumnCell
              Columns = <
                item
                  Expanded = False
                  FieldName = 'ITENS_REQ_PRODCODIGO'
                  Title.Alignment = taCenter
                  Title.Caption = 'C'#243'digo'
                  Visible = True
                end
                item
                  Expanded = False
                  FieldName = 'ITENS_REQ_PROD_DESC'
                  Title.Caption = 'Descri'#231#227'o'
                  Width = 300
                  Visible = True
                end
                item
                  Expanded = False
                  FieldName = 'ITENS_REQ_QUANTIDADE'
                  Title.Alignment = taCenter
                  Width = 80
                  Visible = True
                end
                item
                  Expanded = False
                  FieldName = 'ITENS_REQ_QTD_ATENDIDA'
                  Title.Alignment = taCenter
                  Width = 80
                  Visible = True
                end
                item
                  Expanded = False
                  FieldName = 'ITENS_REQ_DATA_VALIDACAO'
                  Title.Alignment = taCenter
                  Width = 100
                  Visible = True
                end>
            end
            object Panel6: TPanel
              Left = 0
              Top = 183
              Width = 834
              Height = 33
              Align = alBottom
              Ctl3D = False
              ParentCtl3D = False
              TabOrder = 5
              object BitSalvarItem: TBitBtn
                Tag = 10
                Left = 656
                Top = 5
                Width = 80
                Height = 23
                Caption = '&Salvar'
                TabOrder = 0
                OnClick = BitSalvarItemClick
                Glyph.Data = {
                  76010000424D7601000000000000760000002800000020000000100000000100
                  04000000000000010000130B0000130B00001000000000000000000000000000
                  800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
                  FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070
                  7700333333337777777733333333008088003333333377F73377333333330088
                  88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000
                  000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF
                  FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039
                  99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999
                  99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
                  99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
                  93337FFFF7737777733300000033333333337777773333333333}
                NumGlyphs = 2
              end
              object BitCancelarItem: TBitBtn
                Tag = 10
                Left = 742
                Top = 5
                Width = 80
                Height = 23
                Caption = '&Cancelar'
                TabOrder = 1
                OnClick = BitCancelarItemClick
                Glyph.Data = {
                  76010000424D7601000000000000760000002800000020000000100000000100
                  04000000000000010000130B0000130B00001000000000000000000000000000
                  800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
                  FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
                  3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
                  33333337777FF377FF3333993370739993333377FF373F377FF3399993000339
                  993337777F777F3377F3393999707333993337F77737333337FF993399933333
                  399377F3777FF333377F993339903333399377F33737FF33377F993333707333
                  399377F333377FF3377F993333101933399377F333777FFF377F993333000993
                  399377FF3377737FF7733993330009993933373FF3777377F7F3399933000399
                  99333773FF777F777733339993707339933333773FF7FFF77333333999999999
                  3333333777333777333333333999993333333333377777333333}
                NumGlyphs = 2
              end
              object Panel5: TPanel
                Left = 7
                Top = 6
                Width = 113
                Height = 22
                Caption = 'Comp'#245'e KIT'
                Color = clMoneyGreen
                Ctl3D = False
                ParentCtl3D = False
                TabOrder = 2
              end
              object Panel7: TPanel
                Left = 136
                Top = 6
                Width = 113
                Height = 22
                Caption = 'N'#227'o Comp'#245'e KIT'
                Color = clWhite
                Ctl3D = False
                ParentCtl3D = False
                TabOrder = 3
              end
            end
            object Panel4: TPanel
              Left = 0
              Top = 0
              Width = 834
              Height = 33
              Align = alTop
              TabOrder = 0
              object BitInseriItem: TBitBtn
                Tag = 10
                Left = 3
                Top = 5
                Width = 80
                Height = 23
                Caption = '&Incluir'
                TabOrder = 0
                OnClick = BitInseriItemClick
                Glyph.Data = {
                  76010000424D7601000000000000760000002800000020000000100000000100
                  04000000000000010000130B0000130B00001000000000000000000000000000
                  800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
                  FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
                  333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
                  0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
                  07333337F3FF3FFF7F333330F00F000F07333337F77377737F333330FFFFFFFF
                  07333FF7F3FFFF3F7FFFBBB0F0000F0F0BB37777F7777373777F3BB0FFFFFFFF
                  0BBB3777F3FF3FFF77773330F00F000003333337F773777773333330FFFF0FF0
                  33333337F3FF7F37F3333330F08F0F0B33333337F7737F77FF333330FFFF003B
                  B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
                  3BB33773333773333773B333333B3333333B7333333733333337}
                NumGlyphs = 2
              end
              object BitEditarItem: TBitBtn
                Tag = 10
                Left = 90
                Top = 5
                Width = 80
                Height = 23
                Caption = '&Editar'
                TabOrder = 1
                OnClick = BitEditarItemClick
                Glyph.Data = {
                  76010000424D7601000000000000760000002800000020000000100000000100
                  04000000000000010000120B0000120B00001000000000000000000000000000
                  800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
                  FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
                  000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
                  00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
                  F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
                  0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
                  FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
                  FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
                  0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
                  00333377737FFFFF773333303300000003333337337777777333}
                NumGlyphs = 2
              end
              object BitExcluirItem: TBitBtn
                Tag = 10
                Left = 177
                Top = 5
                Width = 80
                Height = 23
                Caption = '&Excluir'
                TabOrder = 2
                OnClick = BitExcluirItemClick
                Glyph.Data = {
                  B2050000424DB205000000000000360400002800000012000000130000000100
                  0800000000007C010000C30E0000C30E00000001000000000000000000007B00
                  0000BD000000FF0000007B7B000000FF0000FFFF000000315A0008427300084A
                  730000007B007B007B00084A7B0008527B0021527B00007B7B007B7B7B00004A
                  840008528400105284002963840008528C00085A8C00185A8C0018638C002963
                  8C0008529400185A9400296B9400316B94002973940031739400085A9C001863
                  9C0018739C0029739C0031739C0031849C00005AA5002173A5003973A500297B
                  A500186BAD00106BB500317BB5002984B5004A8CB500086BBD000073BD001073
                  BD001873BD00217BBD004284BD00318CBD004A8CBD005294BD005A9CBD00BDBD
                  BD001073C600007BC600217BC600428CC6004A8CC6005A9CC6000084CE000884
                  CE00398CCE005A9CCE00639CCE001884D6002184D600088CD600108CD6004294
                  D600399CD6004A9CD600529CD6005A9CD6005AA5D60063ADD6001884DE002184
                  DE00188CDE001094DE001894DE003194DE00299CDE004AA5DE005AA5DE004AB5
                  DE00189CE700219CE700429CE7005AA5E7005AADE70063ADE7006BB5E70021A5
                  EF0029A5EF0031A5EF0063B5EF006BBDEF0029ADF70031ADF7006BBDF7000000
                  FF00FF00FF0031B5FF0039B5FF0042B5FF0039BDFF0042BDFF0042C6FF004AC6
                  FF006BC6FF004ACEFF0052CEFF0052D6FF005ADEFF0063E7FF0000FFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00393939393939
                  3939393939393939393939690000396939393939393939393939393939396939
                  0000396969393910101010101010101010693939000039696969000000000000
                  0000000069693939000039396969007879797978797979696939393900003939
                  3969697903030303030379691039393900003939396969697978797979786969
                  1039393900003939393969696903030369696900103939390000393939390069
                  6969797869697900103939390000393939390079036969696903790010393939
                  0000393939390079796969696978790010393939000039393939007903696969
                  6900000010393939000039393939007869697900696979001039393900003939
                  3939006969697900696969693939393900003939396969697978790079003969
                  6939393900003969696969000000000000393939696939390000396969693939
                  3939393939393939393969390000393939393939393939393939393939393969
                  00003939393939393939393939393939393939390000}
              end
              object DBNitens: TDBNavigator
                Tag = 11
                Left = 728
                Top = 5
                Width = 80
                Height = 23
                DataSource = DsItensRequisicao
                VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
                TabOrder = 4
              end
              object stItens: TStaticText
                Left = 603
                Top = 9
                Width = 117
                Height = 20
                Alignment = taRightJustify
                Caption = ' Reg: 10000/10000 '
                TabOrder = 5
              end
              object btnCarregarKit: TBitBtn
                Tag = 1
                Left = 264
                Top = 5
                Width = 75
                Height = 23
                Caption = 'KIT'
                TabOrder = 3
                OnClick = btnCarregarKitClick
              end
            end
            object EdCodProdutoMercadoria: TEdit
              Tag = 10
              Left = 3
              Top = 111
              Width = 71
              Height = 22
              Ctl3D = False
              Font.Charset = ANSI_CHARSET
              Font.Color = clBlack
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = []
              ParentCtl3D = False
              ParentFont = False
              TabOrder = 2
              OnExit = EdCodProdutoMercadoriaExit
              OnKeyDown = EdCodProdutoMercadoriaKeyDown
            end
            object DBLCBProdutoMercadoria: TDBLookupComboBox
              Tag = 10
              Left = 80
              Top = 111
              Width = 449
              Height = 22
              Hint = '(F3) Visualizar Descri'#231#227'o - (F7) Todos - (F8) Cliente'
              Ctl3D = False
              DataField = 'ITENS_REQ_PRODCODIGO'
              DataSource = DsItensRequisicao
              Font.Charset = ANSI_CHARSET
              Font.Color = clBlack
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = []
              KeyField = 'PROD_CODIGO'
              ListField = 'PROD_DESCRICAOSAI'
              ListSource = DSProduto
              ParentCtl3D = False
              ParentFont = False
              ParentShowHint = False
              ShowHint = True
              TabOrder = 3
              OnExit = DBLCBProdutoMercadoriaExit
              OnKeyDown = DBLCBProdutoMercadoriaKeyDown
            end
            object RxDBCQtd: TRxDBCalcEdit
              Tag = 10
              Left = 534
              Top = 111
              Width = 71
              Height = 22
              DataField = 'ITENS_REQ_QUANTIDADE'
              DataSource = DsItensRequisicao
              Alignment = taCenter
              Ctl3D = False
              DecimalPlaces = 5
              DisplayFormat = '0.,####'
              ButtonWidth = 0
              NumGlyphs = 2
              ParentCtl3D = False
              TabOrder = 4
            end
            object DBLCBLocal: TDBLookupComboBox
              Left = 2
              Top = 64
              Width = 423
              Height = 22
              Ctl3D = False
              DataField = 'ITENS_REQ_LOCAL'
              DataSource = DsItensRequisicao
              KeyField = 'LOC_CODIGO'
              ListField = 'LOC_DESCRICAO'
              ListSource = DSLocal
              ParentCtl3D = False
              TabOrder = 1
              OnKeyDown = dblCamposPesquisaKeyDown
            end
            object DBRadioGroup1: TDBRadioGroup
              Left = 622
              Top = 113
              Width = 130
              Height = 64
              Caption = '  Valida'#231#227'o  '
              Ctl3D = False
              DataField = 'ITENS_REQ_VALIDACAO'
              DataSource = DsItensRequisicao
              Items.Strings = (
                'Validado'
                'N'#227'o Validado')
              ParentCtl3D = False
              ReadOnly = True
              TabOrder = 7
              Values.Strings = (
                'S'
                'N')
            end
            object rgValidacao: TDBRadioGroup
              Left = 622
              Top = 41
              Width = 130
              Height = 68
              Caption = ' Situa'#231#227'o '
              Ctl3D = False
              DataField = 'ITENS_REQ_SITUACAO'
              DataSource = DsItensRequisicao
              Items.Strings = (
                'Em Aberto'
                'Fechado')
              ParentCtl3D = False
              ReadOnly = True
              TabOrder = 8
              Values.Strings = (
                'A'
                'F')
            end
          end
        end
      end
    end
  end
  inherited PopupMenu1: TPopupMenu
    Left = 560
    Top = 224
  end
  inherited dsCadastro: TDataSource
    Left = 376
    Top = 256
  end
  inherited QCadastro: TQuery
    SQL.Strings = (
      'SELECT '
      '  REQUISICAO.REQ_CODIGO,'
      '  REQUISICAO.REQ_DATA,'
      '  REQUISICAO.REQ_SOLICITANTE,'
      '  REQUISICAO.REQ_SOLICITANTE_DESC,'
      '  REQUISICAO.USUARIO_CADASTRO,'
      '  REQUISICAO.USUARIO_AUTERACAO,'
      '  REQUISICAO.USUARIO_EXCLUSAO,'
      '  REQUISICAO.DATA_CADASTRO,'
      '  REQUISICAO.DATA_AUTERACAO,'
      '  REQUISICAO.DATA_EXCLUSAO,'
      '  REQUISICAO.EXCLUIDO,'
      '  REQUISICAO.CODIGOEMPRESA,'
      '  REQUISICAO.REQ_CENTROCUSTO,'
      '  REQUISICAO.REQ_NTALAO,'
      '  REQUISICAO.REQ_ORDEM_SERVICO,'
      '  REQUISICAO.REQ_TIPO_REQUISICAO,'
      '  REQUISICAO.REQ_ULTIMA_VALIDACAO,'
      '  REQUISICAO.REQ_AUTORIZADA,'
      '  REQUISICAO.REQ_DATA_AUTORIZACAO,'
      '  REQUISICAO.REQ_AUTORIZANTE,'
      '  REQUISICAO.REQ_AUTORIZANTE_DESC,'
      '  REQUISICAO.REQ_CONF_VALIDACAO,'
      '  REQUISICAO.REQ_DATA_CONF_VALIDACAO,'
      '  REQUISICAO.REQ_VALIDADOR,'
      '  REQUISICAO.REQ_VALIDADOR_DESC,'
      '  REQUISICAO.REQ_ATUALISOU_ESTOQUE'
      'FROM'
      '  REQUISICAO')
    Left = 376
    Top = 304
  end
  inherited dspCadastro: TDataSetProvider
    Left = 376
    Top = 352
  end
  inherited cdsCadastro: TClientDataSet
    Left = 376
    Top = 400
    object cdsCadastroREQ_CODIGO: TIntegerField
      Alignment = taCenter
      DisplayLabel = 'C'#243'digo'
      DisplayWidth = 7
      FieldName = 'REQ_CODIGO'
      Origin = 'BASE.REQUISICAO.REQ_CODIGO'
    end
    object cdsCadastroREQ_DATA: TDateTimeField
      DisplayLabel = 'Data'
      DisplayWidth = 10
      FieldName = 'REQ_DATA'
      Origin = 'BASE.REQUISICAO.REQ_DATA'
      DisplayFormat = 'dd/mm/yyyy'
    end
    object cdsCadastroREQ_SOLICITANTE: TIntegerField
      DisplayLabel = 'Requisitante'
      FieldName = 'REQ_SOLICITANTE'
      Origin = 'BASE.REQUISICAO.REQ_SOLICITANTE'
    end
    object cdsCadastroREQ_SOLICITANTE_DESC: TStringField
      DisplayLabel = 'Requisitante'
      DisplayWidth = 30
      FieldName = 'REQ_SOLICITANTE_DESC'
      Origin = 'BASE.REQUISICAO.REQ_SOLICITANTE_DESC'
      Size = 60
    end
    object cdsCadastroUSUARIO_CADASTRO: TStringField
      FieldName = 'USUARIO_CADASTRO'
      Origin = 'BASE.REQUISICAO.USUARIO_CADASTRO'
      Size = 22
    end
    object cdsCadastroUSUARIO_AUTERACAO: TStringField
      FieldName = 'USUARIO_AUTERACAO'
      Origin = 'BASE.REQUISICAO.USUARIO_AUTERACAO'
      Size = 22
    end
    object cdsCadastroDATA_CADASTRO: TDateTimeField
      FieldName = 'DATA_CADASTRO'
      Origin = 'BASE.REQUISICAO.DATA_CADASTRO'
    end
    object cdsCadastroUSUARIO_EXCLUSAO: TStringField
      FieldName = 'USUARIO_EXCLUSAO'
      Origin = 'BASE.REQUISICAO.USUARIO_EXCLUSAO'
      Size = 22
    end
    object cdsCadastroDATA_AUTERACAO: TDateTimeField
      FieldName = 'DATA_AUTERACAO'
      Origin = 'BASE.REQUISICAO.DATA_AUTERACAO'
    end
    object cdsCadastroDATA_EXCLUSAO: TDateTimeField
      FieldName = 'DATA_EXCLUSAO'
      Origin = 'BASE.REQUISICAO.DATA_EXCLUSAO'
    end
    object cdsCadastroEXCLUIDO: TStringField
      FieldName = 'EXCLUIDO'
      Origin = 'BASE.REQUISICAO.EXCLUIDO'
      FixedChar = True
      Size = 1
    end
    object cdsCadastroCODIGOEMPRESA: TIntegerField
      FieldName = 'CODIGOEMPRESA'
      Origin = 'BASE.REQUISICAO.CODIGOEMPRESA'
    end
    object cdsCadastroREQ_CENTROCUSTO: TIntegerField
      FieldName = 'REQ_CENTROCUSTO'
      Origin = 'BASE.REQUISICAO.REQ_CENTROCUSTO'
    end
    object cdsCadastroREQ_NTALAO: TStringField
      Alignment = taCenter
      DisplayLabel = 'N'#186' Tal'#227'o'
      FieldName = 'REQ_NTALAO'
      Origin = 'BASE.REQUISICAO.REQ_NTALAO'
      Size = 10
    end
    object cdsCadastroREQ_ORDEM_SERVICO: TStringField
      Alignment = taCenter
      FieldName = 'REQ_ORDEM_SERVICO'
      Origin = 'BASE.REQUISICAO.REQ_ORDEM_SERVICO'
      Size = 10
    end
    object cdsCadastroREQ_TIPO_REQUISICAO: TIntegerField
      FieldName = 'REQ_TIPO_REQUISICAO'
      Origin = 'BASE.REQUISICAO.REQ_TIPO_REQUISICAO'
    end
    object cdsCadastroREQ_ULTIMA_VALIDACAO: TDateTimeField
      FieldName = 'REQ_ULTIMA_VALIDACAO'
      Origin = 'BASE.REQUISICAO.REQ_ULTIMA_VALIDACAO'
    end
    object cdsCadastroREQ_AUTORIZADA: TStringField
      Alignment = taCenter
      DisplayLabel = 'Aut.'
      FieldName = 'REQ_AUTORIZADA'
      Origin = 'BASE.REQUISICAO.REQ_AUTORIZADA'
      FixedChar = True
      Size = 1
    end
    object cdsCadastroREQ_DATA_AUTORIZACAO: TDateTimeField
      FieldName = 'REQ_DATA_AUTORIZACAO'
      Origin = 'BASE.REQUISICAO.REQ_DATA_AUTORIZACAO'
    end
    object cdsCadastroREQ_AUTORIZANTE: TIntegerField
      FieldName = 'REQ_AUTORIZANTE'
      Origin = 'BASE.REQUISICAO.REQ_AUTORIZANTE'
    end
    object cdsCadastroREQ_AUTORIZANTE_DESC: TStringField
      DisplayLabel = 'Autorizante'
      DisplayWidth = 30
      FieldName = 'REQ_AUTORIZANTE_DESC'
      Origin = 'BASE.REQUISICAO.REQ_AUTORIZANTE_DESC'
      Size = 40
    end
    object cdsCadastroREQ_CONF_VALIDACAO: TStringField
      FieldName = 'REQ_CONF_VALIDACAO'
      FixedChar = True
      Size = 1
    end
    object cdsCadastroREQ_DATA_CONF_VALIDACAO: TDateTimeField
      FieldName = 'REQ_DATA_CONF_VALIDACAO'
    end
    object cdsCadastroREQ_VALIDADOR: TIntegerField
      FieldName = 'REQ_VALIDADOR'
    end
    object cdsCadastroREQ_VALIDADOR_DESC: TStringField
      FieldName = 'REQ_VALIDADOR_DESC'
      Size = 40
    end
    object cdsCadastroREQ_ATUALISOU_ESTOQUE: TStringField
      FieldName = 'REQ_ATUALISOU_ESTOQUE'
      FixedChar = True
      Size = 1
    end
  end
  inherited dsCamposPesquisa: TDataSource
    Left = 560
    Top = 168
  end
  inherited OpenDialog1: TOpenDialog
    Left = 560
    Top = 128
  end
  object DsItensRequisicao: TDataSource
    DataSet = CDSItensRequisicao
    OnStateChange = DsItensRequisicaoStateChange
    OnDataChange = DsItensRequisicaoDataChange
    Left = 464
    Top = 256
  end
  object DSPItensRequisicao: TDataSetProvider
    DataSet = QItensRequisicao
    Constraints = True
    Left = 464
    Top = 352
  end
  object CDSItensRequisicao: TClientDataSet
    Aggregates = <>
    IndexFieldNames = 'ITENS_REQ_REQCODIGO'
    MasterFields = 'REQ_CODIGO'
    MasterSource = dsCadastro
    PacketRecords = 0
    Params = <>
    ProviderName = 'DSPItensRequisicao'
    BeforePost = CDSItensRequisicaoBeforePost
    Left = 464
    Top = 400
    object CDSItensRequisicaoITENS_REQ_CODIGO: TIntegerField
      Alignment = taCenter
      FieldName = 'ITENS_REQ_CODIGO'
    end
    object CDSItensRequisicaoITENS_REQ_REQCODIGO: TIntegerField
      FieldName = 'ITENS_REQ_REQCODIGO'
    end
    object CDSItensRequisicaoITENS_REQ_PRODCODIGO: TIntegerField
      Alignment = taCenter
      FieldName = 'ITENS_REQ_PRODCODIGO'
    end
    object CDSItensRequisicaoITENS_REQ_PROD_DESC: TStringField
      FieldName = 'ITENS_REQ_PROD_DESC'
      Size = 60
    end
    object CDSItensRequisicaoITENS_REQ_KIT_CODIGO: TIntegerField
      FieldName = 'ITENS_REQ_KIT_CODIGO'
    end
    object CDSItensRequisicaoUSUARIO_CADASTRO: TIntegerField
      FieldName = 'USUARIO_CADASTRO'
    end
    object CDSItensRequisicaoUSUARIO_AUTERACAO: TIntegerField
      FieldName = 'USUARIO_AUTERACAO'
    end
    object CDSItensRequisicaoUSUARIO_EXCLUSAO: TIntegerField
      FieldName = 'USUARIO_EXCLUSAO'
    end
    object CDSItensRequisicaoDATA_CADASTRO: TDateTimeField
      FieldName = 'DATA_CADASTRO'
    end
    object CDSItensRequisicaoDATA_AUTERACAO: TDateTimeField
      FieldName = 'DATA_AUTERACAO'
    end
    object CDSItensRequisicaoDATA_EXCLUSAO: TDateTimeField
      FieldName = 'DATA_EXCLUSAO'
    end
    object CDSItensRequisicaoEXCLUIDO: TStringField
      FieldName = 'EXCLUIDO'
      FixedChar = True
      Size = 1
    end
    object CDSItensRequisicaoCODIGOEMPRESA: TIntegerField
      FieldName = 'CODIGOEMPRESA'
    end
    object CDSItensRequisicaoITENS_REQ_LOCAL: TIntegerField
      FieldName = 'ITENS_REQ_LOCAL'
    end
    object CDSItensRequisicaoITENS_REQ_SITUACAO: TStringField
      FieldName = 'ITENS_REQ_SITUACAO'
      FixedChar = True
      Size = 1
    end
    object CDSItensRequisicaoITENS_REQ_VALIDACAO: TStringField
      FieldName = 'ITENS_REQ_VALIDACAO'
      FixedChar = True
      Size = 1
    end
    object CDSItensRequisicaoITENS_REQ_DATA_VALIDACAO: TDateTimeField
      Alignment = taCenter
      DisplayLabel = 'Data Valida'#231#227'o'
      FieldName = 'ITENS_REQ_DATA_VALIDACAO'
      DisplayFormat = 'dd/mm/yy  hh:mm'
    end
    object CDSItensRequisicaoITENS_REQ_QTD_ATENDIDA: TFloatField
      Alignment = taCenter
      DisplayLabel = 'Quant.Atend'
      FieldName = 'ITENS_REQ_QTD_ATENDIDA'
    end
    object CDSItensRequisicaoITENS_REQ_QUANTIDADE: TFloatField
      Alignment = taCenter
      DisplayLabel = 'Quant.Req'
      FieldName = 'ITENS_REQ_QUANTIDADE'
    end
  end
  object QItensRequisicao: TQuery
    CachedUpdates = True
    DatabaseName = 'base'
    DataSource = dsCadastro
    SQL.Strings = (
      'SELECT '
      '  ITENSREQUISICAO.ITENS_REQ_CODIGO,'
      '  ITENSREQUISICAO.ITENS_REQ_REQCODIGO,'
      '  ITENSREQUISICAO.ITENS_REQ_PRODCODIGO,'
      '  ITENSREQUISICAO.ITENS_REQ_PROD_DESC,'
      '  ITENSREQUISICAO.ITENS_REQ_QUANTIDADE,'
      '  ITENSREQUISICAO.ITENS_REQ_KIT_CODIGO,'
      '  ITENSREQUISICAO.ITENS_REQ_LOCAL,'
      '  ITENSREQUISICAO.ITENS_REQ_SITUACAO,'
      '  ITENSREQUISICAO.ITENS_REQ_VALIDACAO,'
      '  ITENSREQUISICAO.USUARIO_CADASTRO,'
      '  ITENSREQUISICAO.USUARIO_AUTERACAO,'
      '  ITENSREQUISICAO.USUARIO_EXCLUSAO,'
      '  ITENSREQUISICAO.DATA_CADASTRO,'
      '  ITENSREQUISICAO.DATA_AUTERACAO,'
      '  ITENSREQUISICAO.DATA_EXCLUSAO,'
      '  ITENSREQUISICAO.EXCLUIDO,'
      '  ITENSREQUISICAO.CODIGOEMPRESA,'
      '  ITENSREQUISICAO.ITENS_REQ_DATA_VALIDACAO,'
      '  ITENSREQUISICAO.ITENS_REQ_QTD_ATENDIDA'
      'FROM'
      '  ITENSREQUISICAO'
      'WHERE'
      '  ITENSREQUISICAO.ITENS_REQ_REQCODIGO = :REQ_CODIGO')
    Left = 464
    Top = 304
    ParamData = <
      item
        DataType = ftInteger
        Name = 'ITENS_REQ_REQCODIGO'
        ParamType = ptUnknown
        Value = 5
      end>
  end
  object DSProduto: TDataSource
    DataSet = DMGestao.QProdutoEnt
    Left = 784
    Top = 136
  end
  object DSSolicitante: TDataSource
    DataSet = DMGestao.QSolicitante
    Left = 784
    Top = 184
  end
  object dsCentroCusto: TDataSource
    DataSet = DMFinanceiro.QCentro
    OnDataChange = dsCentroCustoDataChange
    Left = 784
    Top = 232
  end
  object DSLocal: TDataSource
    DataSet = DMGestao.QLocal
    Left = 784
    Top = 280
  end
  object dsTipoRequisicao: TDataSource
    DataSet = DMGestao.QTipoRequisicao
    Left = 536
    Top = 256
  end
  object QPesquisa: TQuery
    DatabaseName = 'base'
    SQL.Strings = (
      ' SELECT'
      ' SOLI_CODIGO'
      ' FROM'
      ' SOLICITANTE'
      ' WHERE'
      ' (SOLI_MATRICULA = 123456) AND'
      ' (SOL_VALIDADOR_ID = '#39'S'#39')')
    Left = 592
    Top = 418
  end
  object dsPesquisa: TDataSource
    DataSet = QPesquisa
    Left = 591
    Top = 386
  end
end
